﻿Namespace stigzler

    Public Class XMLOps


        Public Shared Sub SaveXML(DT As DataSet, XML As String)
            DT.WriteXml(XML)
        End Sub

        Public Shared Sub LoadXML(DT As DataSet, XML As String)
            DT.ReadXml(XML)
        End Sub

        'Public Function CheckXMLLocation(XMLPath As String) As Boolean
        '    If My.Computer.FileSystem.DirectoryExists(XMLPath) Then
        '        Return True
        '    Else
        '        System.IO.Directory.CreateDirectory(XMLPath)
        '        Return False
        '    End If
        'End Function




    End Class
End Namespace